/ The Macintosh Demo: Applications / Apple-MacintoshDemoApplicationsCD-1.0-1992.iso / More Information / QuicKeys / For Programmers Only.sea / Pascal Examples / Read Me (Pascal Examples)

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 19 52 65 61 64 20 4d | 65 20 28 50 61 73 63 61 |..Read M|e (Pasca|
|00000010| 6c 20 45 78 61 6d 70 6c | 65 73 29 00 00 00 00 00 |l Exampl|es).....|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 07 0d 00 | 00 01 7e a4 88 97 e0 a4 |........|..~.....|
|00000060| 88 97 e0 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 82 66 00 00 |........|.....f..|
|00000080| 54 68 69 73 20 66 6f 6c | 64 65 72 20 63 6f 6e 74 |This fol|der cont|
|00000090| 61 69 6e 73 20 74 68 65 | 20 50 61 73 63 61 6c 20 |ains the| Pascal |
|000000a0| 76 65 72 73 69 6f 6e 20 | 6f 66 20 74 68 65 20 53 |version |of the S|
|000000b0| 61 6d 70 6c 65 20 65 78 | 74 65 6e 73 69 6f 6e 2e |ample ex|tension.|
|000000c0| 20 20 4d 61 6e 79 20 6f | 66 0d 74 68 65 20 73 61 |  Many o|f.the sa|
|000000d0| 6d 65 20 73 6f 75 72 63 | 65 20 66 69 6c 65 73 20 |me sourc|e files |
|000000e0| 61 72 65 20 75 73 65 64 | 20 69 6e 20 62 6f 74 68 |are used| in both|
|000000f0| 20 74 68 65 20 4d 50 57 | 20 61 6e 64 20 54 68 69 | the MPW| and Thi|
|00000100| 6e 6b 20 50 61 73 63 61 | 6c 20 76 65 72 73 69 6f |nk Pasca|l versio|
|00000110| 6e 73 2e 0d 0d 42 75 69 | 6c 64 69 6e 67 20 69 6e |ns...Bui|lding in|
|00000120| 73 74 72 75 63 74 69 6f | 6e 73 20 66 6f 72 20 4d |structio|ns for M|
|00000130| 50 57 20 55 73 65 72 73 | 3a 0d 09 42 75 69 6c 64 |PW Users|:..Build|
|00000140| 69 6e 67 20 53 61 6d 70 | 6c 65 20 66 72 6f 6d 20 |ing Samp|le from |
|00000150| 74 68 65 20 42 75 69 6c | 64 20 4d 65 6e 75 20 77 |the Buil|d Menu w|
|00000160| 69 6c 6c 20 6d 61 6b 65 | 20 74 68 65 20 65 78 74 |ill make| the ext|
|00000170| 65 6e 73 69 6f 6e 2e 20 | 54 68 65 20 6d 61 6b 65 |ension. |The make|
|00000180| 66 69 6c 65 0d 09 77 69 | 6c 6c 20 61 75 74 6f 6d |file..wi|ll autom|
|00000190| 61 74 69 63 61 6c 6c 79 | 20 63 6f 70 79 20 74 68 |atically| copy th|
|000001a0| 65 20 53 61 6d 70 6c 65 | 20 65 78 74 65 6e 73 69 |e Sample| extensi|
|000001b0| 6f 6e 20 74 6f 20 74 68 | 65 20 51 75 69 63 4b 65 |on to th|e QuicKe|
|000001c0| 79 73 20 32 20 65 78 74 | 65 6e 73 69 6f 6e 0d 09 |ys 2 ext|ension..|
|000001d0| 66 6f 6c 64 65 72 2e 0d | 0d 42 75 69 6c 64 69 6e |folder..|.Buildin|
|000001e0| 67 20 69 6e 73 74 72 75 | 63 74 69 6f 6e 73 20 66 |g instru|ctions f|
|000001f0| 6f 72 20 54 68 69 6e 6b | 20 50 61 73 63 61 6c 20 |or Think| Pascal |
|00000200| 55 73 65 72 73 3a 0d 09 | 42 75 69 6c 64 20 62 6f |Users:..|Build bo|
|00000210| 74 68 20 74 68 65 20 53 | 61 6d 70 6c 65 55 49 20 |th the S|ampleUI |
|00000220| 61 6e 64 20 53 61 6d 70 | 6c 65 58 20 70 72 6f 6a |and Samp|leX proj|
|00000230| 65 63 74 73 2e 0d 09 54 | 68 65 6e 20 72 75 6e 20 |ects...T|hen run |
|00000240| 53 41 52 65 7a 20 77 69 | 74 68 20 53 61 6d 70 6c |SARez wi|th Sampl|
|00000250| 65 20 61 73 20 79 6f 75 | 72 20 6f 75 74 70 75 74 |e as you|r output|
|00000260| 20 66 69 6c 65 20 61 6e | 64 20 53 61 6d 70 6c 65 | file an|d Sample|
|00000270| 2e 72 20 61 73 20 79 6f | 75 72 0d 09 64 65 73 63 |.r as yo|ur..desc|
|00000280| 72 69 70 74 69 6f 6e 20 | 66 69 6c 65 2e 20 20 54 |ription |file.  T|
|00000290| 68 65 20 66 69 6c 65 20 | 22 53 41 52 65 7a 20 73 |he file |"SARez s|
|000002a0| 65 74 74 69 6e 67 73 22 | 20 63 6f 6e 74 61 69 6e |ettings"| contain|
|000002b0| 73 20 61 6e 20 65 78 61 | 6d 70 6c 65 20 6f 66 0d |s an exa|mple of.|
|000002c0| 09 74 68 65 20 73 65 74 | 74 69 6e 67 73 20 75 73 |.the set|tings us|
|000002d0| 65 64 20 74 6f 20 63 72 | 65 61 74 65 20 53 61 6d |ed to cr|eate Sam|
|000002e0| 70 6c 65 2e 0d 0d 09 41 | 66 74 65 72 20 62 75 69 |ple....A|fter bui|
|000002f0| 6c 64 69 6e 67 2c 20 79 | 6f 75 20 6d 75 73 74 20 |lding, y|ou must |
|00000300| 63 6f 70 79 20 74 68 65 | 20 53 61 6d 70 6c 65 20 |copy the| Sample |
|00000310| 65 78 74 65 6e 73 69 6f | 6e 20 74 6f 20 74 68 65 |extensio|n to the|
|00000320| 20 51 75 69 63 4b 65 79 | 73 20 32 0d 09 65 78 74 | QuicKey|s 2..ext|
|00000330| 65 6e 73 69 6f 6e 20 66 | 6f 6c 64 65 72 20 77 68 |ension f|older wh|
|00000340| 69 63 68 20 69 73 20 69 | 6e 20 0d 09 09 3c 79 6f |ich is i|n ...<yo|
|00000350| 75 72 20 73 79 73 74 65 | 6d 20 66 6f 6c 64 65 72 |ur syste|m folder|
|00000360| 3e 3a 50 72 65 66 65 72 | 65 6e 63 65 73 3a 51 75 |>:Prefer|ences:Qu|
|00000370| 69 63 4b 65 79 73 20 46 | 6f 6c 64 65 72 3a 45 78 |icKeys F|older:Ex|
|00000380| 74 65 6e 73 69 6f 6e 73 | 0d 0d 0d 46 69 6c 65 73 |tensions|...Files|
|00000390| 20 69 6e 20 74 68 69 73 | 20 66 6f 6c 64 65 72 3a | in this| folder:|
|000003a0| 0d 63 6f 6d 6d 6f 6e 45 | 78 65 63 75 74 65 2e 61 |.commonE|xecute.a|
|000003b0| 09 09 41 6c 6c 6f 63 61 | 74 65 73 20 73 70 61 63 |..Alloca|tes spac|
|000003c0| 65 20 66 6f 72 20 45 78 | 65 63 75 74 65 51 75 65 |e for Ex|ecuteQue|
|000003d0| 75 65 20 69 6e 20 4d 50 | 57 20 76 65 72 73 69 6f |ue in MP|W versio|
|000003e0| 6e 73 0d 09 09 09 09 09 | 61 6e 64 20 63 61 6c 6c |ns......|and call|
|000003f0| 73 20 64 6f 45 78 65 63 | 75 74 65 0d 0d 63 6f 6d |s doExec|ute..com|
|00000400| 6d 6f 6e 45 78 65 63 75 | 74 65 2e 61 2e 6f 09 42 |monExecu|te.a.o.B|
|00000410| 75 69 6c 64 20 76 65 72 | 73 69 6f 6e 20 6f 66 20 |uild ver|sion of |
|00000420| 63 6f 6d 6d 6f 6e 45 78 | 65 63 75 74 65 2e 61 2e |commonEx|ecute.a.|
|00000430| 20 20 54 68 69 6e 6b 20 | 50 61 73 63 61 6c 20 75 |  Think |Pascal u|
|00000440| 73 65 73 0d 09 09 09 09 | 09 74 68 69 73 20 66 69 |ses.....|.this fi|
|00000450| 6c 65 20 66 6f 72 20 74 | 68 65 20 63 75 73 74 6f |le for t|he custo|
|00000460| 6d 20 68 65 61 64 65 72 | 20 69 6e 20 74 68 65 20 |m header| in the |
|00000470| 65 78 65 63 75 74 65 20 | 72 6f 75 74 69 6e 65 2e |execute |routine.|
|00000480| 0d 0d 65 78 74 65 6e 73 | 69 6f 6e 73 2e 70 09 09 |..extens|ions.p..|
|00000490| 51 75 69 63 4b 65 79 73 | 20 32 aa 20 65 78 74 65 |QuicKeys| 2. exte|
|000004a0| 6e 73 69 6f 6e 20 64 65 | 66 69 6e 69 74 69 6f 6e |nsion de|finition|
|000004b0| 73 0d 0d 53 61 6d 70 6c | 65 2e 6d 61 6b 65 09 09 |s..Sampl|e.make..|
|000004c0| 09 4d 61 6b 65 66 69 6c | 65 20 66 6f 72 20 4d 50 |.Makefil|e for MP|
|000004d0| 57 20 75 73 65 72 73 20 | 74 6f 20 62 75 69 6c 64 |W users |to build|
|000004e0| 20 53 61 6d 70 6c 65 20 | 65 78 74 65 6e 73 69 6f | Sample |extensio|
|000004f0| 6e 0d 0d 53 61 6d 70 6c | 65 2e 72 09 09 09 52 65 |n..Sampl|e.r...Re|
|00000500| 73 6f 75 72 63 65 20 64 | 65 66 69 6e 69 74 69 6f |source d|efinitio|
|00000510| 6e 73 2e 0d 09 09 09 09 | 09 43 6f 6d 6d 6f 6e 20 |ns......|.Common |
|00000520| 74 6f 20 62 6f 74 68 20 | 4d 50 57 20 61 6e 64 20 |to both |MPW and |
|00000530| 54 68 69 6e 6b 20 50 61 | 73 63 61 6c 2e 0d 0d 53 |Think Pa|scal...S|
|00000540| 61 6d 70 6c 65 44 61 74 | 61 2e 70 09 09 44 65 66 |ampleDat|a.p..Def|
|00000550| 69 6e 69 74 69 6f 6e 20 | 6f 66 20 53 61 6d 70 6c |inition |of Sampl|
|00000560| 65 27 73 20 6b 65 79 20 | 64 61 74 61 2e 0d 09 09 |e's key |data....|
|00000570| 09 09 09 43 6f 6d 6d 6f | 6e 20 74 6f 20 62 6f 74 |...Commo|n to bot|
|00000580| 68 20 4d 50 57 20 61 6e | 64 20 54 68 69 6e 6b 20 |h MPW an|d Think |
|00000590| 50 61 73 63 61 6c 2e 2e | 0d 0d 53 61 6d 70 6c 65 |Pascal..|..Sample|
|000005a0| 55 49 2e 61 09 09 09 55 | 73 65 64 20 69 6e 20 4d |UI.a...U|sed in M|
|000005b0| 50 57 20 76 65 72 73 69 | 6f 6e 20 74 6f 20 6d 61 |PW versi|on to ma|
|000005c0| 6b 65 20 73 75 72 65 20 | 65 6e 74 72 79 20 70 6f |ke sure |entry po|
|000005d0| 69 6e 74 20 69 73 20 66 | 69 72 73 74 0d 09 09 09 |int is f|irst....|
|000005e0| 09 09 6c 6f 63 61 74 69 | 6f 6e 20 69 6e 20 66 69 |..locati|on in fi|
|000005f0| 6c 65 2e 20 20 44 6f 65 | 73 20 6e 6f 74 68 69 6e |le.  Doe|s nothin|
|00000600| 67 20 62 75 74 20 62 72 | 61 6e 63 68 20 74 6f 20 |g but br|anch to |
|00000610| 6d 61 69 6e 2e 0d 0d 53 | 61 6d 70 6c 65 55 49 2e |main...S|ampleUI.|
|00000620| 70 09 09 09 55 73 65 72 | 20 69 6e 74 65 72 66 61 |p...User| interfa|
|00000630| 63 65 20 72 6f 75 74 69 | 6e 65 2e 0d 09 09 09 09 |ce routi|ne......|
|00000640| 09 43 6f 6d 6d 6f 6e 20 | 74 6f 20 62 6f 74 68 20 |.Common |to both |
|00000650| 4d 50 57 20 61 6e 64 20 | 54 68 69 6e 6b 20 50 61 |MPW and |Think Pa|
|00000660| 73 63 61 6c 2e 2e 0d 0d | 53 61 6d 70 6c 65 55 49 |scal....|SampleUI|
|00000670| 2e b9 09 09 09 54 68 69 | 6e 6b 20 50 61 73 63 61 |.....Thi|nk Pasca|
|00000680| 6c 20 70 72 6f 6a 65 63 | 74 20 66 6f 72 20 62 75 |l projec|t for bu|
|00000690| 69 6c 64 69 6e 67 20 75 | 73 65 72 20 69 6e 74 65 |ilding u|ser inte|
|000006a0| 72 66 61 63 65 20 72 6f | 75 74 69 6e 65 2e 0d 0d |rface ro|utine...|
|000006b0| 53 61 6d 70 6c 65 58 2e | 70 09 09 09 45 78 65 63 |SampleX.|p...Exec|
|000006c0| 75 74 69 6f 6e 20 72 6f | 75 74 69 6e 65 2e 0d 09 |ution ro|utine...|
|000006d0| 09 09 09 09 43 6f 6d 6d | 6f 6e 20 74 6f 20 62 6f |....Comm|on to bo|
|000006e0| 74 68 20 4d 50 57 20 61 | 6e 64 20 54 68 69 6e 6b |th MPW a|nd Think|
|000006f0| 20 50 61 73 63 61 6c 2e | 2e 0d 0d 53 61 6d 70 6c | Pascal.|...Sampl|
|00000700| 65 58 2e b9 09 09 09 54 | 68 69 6e 6b 20 50 61 73 |eX.....T|hink Pas|
|00000710| 63 61 6c 20 70 72 6f 6a | 65 63 74 20 66 6f 72 20 |cal proj|ect for |
|00000720| 62 75 69 6c 64 69 6e 67 | 20 65 78 65 63 75 74 69 |building| executi|
|00000730| 6f 6e 20 72 6f 75 74 69 | 6e 65 2e 0d 0d 53 41 52 |on routi|ne...SAR|
|00000740| 65 7a 20 73 65 74 74 69 | 6e 67 09 09 45 78 61 6d |ez setti|ng..Exam|
|00000750| 70 6c 65 20 53 41 52 65 | 7a 20 73 65 74 74 69 6e |ple SARe|z settin|
|00000760| 67 73 20 66 6f 72 20 62 | 75 69 6c 64 69 6e 67 20 |gs for b|uilding |
|00000770| 53 61 6d 70 6c 65 20 69 | 6e 20 54 68 69 6e 6b 0d |Sample i|n Think.|
|00000780| 09 09 09 09 09 50 61 73 | 63 61 6c 2e 0d 00 00 00 |.....Pas|cal.....|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000800| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00000810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000820| 00 00 00 00 04 00 07 00 | 00 00 44 04 00 04 00 04 |........|..D.....|
|00000830| 19 52 65 61 64 20 4d 65 | 20 28 50 61 73 63 61 6c |.Read Me| (Pascal|
|00000840| 20 45 78 61 6d 70 6c 65 | 73 29 02 00 00 00 54 45 | Example|s)....TE|
|00000850| 00 00 54 45 4d 50 44 53 | 45 41 00 00 00 00 00 00 |..TEMPDS|EA......|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 a6 4a 8c 1f 00 00 | 07 0d 00 00 01 7e 7c 43 |...J....|.....~|C|
|00000880| 86 42 86 43 86 7c 7e 3c | 7e 04 60 04 60 07 e0 03 |.B.C.|~<|~.`.`...|
|00000890| e0 00 00 0f c0 0f e0 0f | f0 0f f0 ff ff ff fe fc |........|........|
|000008a0| 7f fc 7f fc 7f ff ff 7f | ff 7f ff 0f f0 0f f0 07 |........|........|
|000008b0| f0 03 e0 00 08 00 08 00 | 00 00 44 3f 00 3f 00 3f |........|..D?.?.?|
|000008c0| 00 3f 00 40 80 84 40 84 | 40 84 60 9c 60 80 40 80 |.?.@..@.|@.`.`.@.|
|000008d0| 40 40 80 3f 00 3f 00 3f | 00 3f 00 3f 00 3f 00 3f |@@.?.?.?|.?.?.?.?|
|000008e0| 00 3f 00 7f 80 ff c0 ff | c0 ff c0 ff c0 ff c0 ff |.?......|........|
|000008f0| c0 7f 80 3f 00 3f 00 3f | 00 3f 00 00 08 00 08 00 |...?.?.?|.?......|
|00000900| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 65 73 20 |...H..Mo|naco.es |
|00000910| 61 72 65 20 73 74 6f 72 | 65 64 20 66 75 6c 6c 79 |are stor|ed fully|
|00000920| 20 71 75 61 6c 69 00 06 | 00 04 00 3c 00 24 01 fd | quali..|...<.$..|
|00000930| 02 7d 00 3c 00 24 01 fd | 02 7d a3 14 07 8c 00 00 |.}.<.$..|.}......|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 01 00 |........|........|
|00000950| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 4f 3e 48 |...L...L|...2.O>H|
|00000960| 0b 64 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.d.....2|..MPSR..|
|00000970| 00 0a 03 ed ff ff 00 00 | 00 00 00 50 78 ec 00 00 |........|...Px...|
+--------+-------------------------+-------------------------+--------+--------+